Usenet 1993 July/InfoMagic USENET CD-ROM July 1993.ISO/sources/misc/volume17/calentool/part08

Internet Message Format | 1991-04-06 | 54.4 KB

From: [e-mail] (Bill Randle)
Newsgroups: comp.sources.misc
Subject: v17i089:  calentool - day/week/month/year-at-a-glance SunView tool, Part08/23
Message-ID: <[e-mail]>
Date: 5 Apr 91 05:07:36 GMT
Approved: [e-mail]
X-Checksum-Snefru: b1210c7e 7ee4659d b05bec65 2d3b869c

Submitted-by: Bill Randle <[e-mail]>
Posting-number: Volume 17, Issue 89
Archive-name: calentool/part08

#! /bin/sh
# This is a shell archive.  Remove anything before this line, then unpack
# it by saving it into a file and typing "sh file".  To overwrite existing
# files, type "sh file -c".  You can also feed this as standard input via
# unshar, or by typing "sh <file", e.g..  If this archive is complete, you
# will see the following message at the end:
#        "End of archive 8 (of 23)."
# Contents:  dates/events5 dpaint.c
# Wrapped by billr@saab on Thu Mar 28 08:38:18 1991
PATH=/bin:/usr/bin:/usr/ucb ; export PATH
if test -f 'dates/events5' -a "${1}" != "-c" ; then
  echo shar: Will not clobber existing file \"'dates/events5'\"
else
echo shar: Extracting \"'dates/events5'\" \(36289 characters\)
sed "s/^X//" >'dates/events5' <<'END_OF_FILE'
X# CalenTool V2.2 - nflag=1 range=9,10 - DO NOT REMOVE THIS LINE
X# $Header: events5,v 1.1 91/03/07 16:19:09 billr Exp $
X# Notable events in history (Sept-Oct)
X# Today in History dates provided by Robert Heckendorn at
X# Hewlett-Packard in Fort Collins, Colorado.
X# Any corrections or additions may be sent to [e-mail]
X#
X# Additional dates provided from ProLine's today file
X#
X# Converted to calentool format by Larry Virden ([e-mail])
X# and further edited and merged by Bill Randle ([e-mail]).
X# All dates in this file are New Style unless otherwise noted.
X# Some duplicates may exist where I haven't been able to verify which
X# one is correct.
X#
X** 09 01 99 99 00 A coup in Libya brought Moammar Gadhafi to power. (1969)
X** 09 01 99 99 00 Aaron Burr aquitted of charges of plotting to set up an empire. (1807)
X** 09 01 99 99 00 California Constitutional Convention held in Monterey. (1849)
X** 09 01 99 99 00 Germany invades Poland, beginning World War II (1939)
X** 09 01 99 99 00 Joshua A. Norton proclaims himself Emperor Norton I (1859)
X** 09 01 99 99 00 Miss Emma Nutt becomes the first women telephone operator in America. Until now, all operators were men. (1878)
X** 09 01 99 99 00 Montrose defeats the Covenanters at Tippermuir in Scotland (1644)
X** 09 01 99 99 00 Peace treaty signed with the Zulus by Britain (1879)
X** 09 02 99 99 00 Alabama Gov. George Wallace prevented the integration of Tuskegee High School by surrounding it with state troopers (1963)
X** 09 02 99 99 00 Great Britain adopts the Gregorian Calendar (1752)
X** 09 02 99 99 00 Japan signs unconditional surrender aboard US battleship "Missouri" (1945)
X** 09 02 99 99 00 The great London fire destroyed around two thirds of London (1666)
X** 09 02 99 99 00 US Treasury Department established by Congress. (1789)
X** 09 02 99 99 00 V.P. Theodore Roosevelt offered the advice, "Speak softly and carry a big stick," in a speech at the Minnesota State Fair (1901)
X** 09 03 99 99 00 Allied forces invade Italy in World War II (1943)
X** 09 03 99 99 00 England and the United States sign the treaty of Paris declaring US independence and ending the Revolutionary War (1783)
X** 09 03 99 99 00 England declares war on Germany. (1939)
X** 09 03 99 99 00 Motorists in Sweden began driving on the right rather than the left (1967)
X** 09 03 99 99 00 Pope John Paul I was officially installed as the 264th supreme pontiff of the Roman Catholic Church (1978)
X** 09 03 99 99 00 Richard the Lionhearted was crowned king of England (1189)
X** 09 04 99 99 00 Apache leader Geronomino surrenders (1896)
X** 09 04 99 99 00 Ford Motor Co. began selling its ill-fated Edsel. (1957)
X** 09 04 99 99 00 George Eastman patents 1st rollfilm camera & registers "Kodak". (1888)
X** 09 04 99 99 00 Los Angeles founded in the Valley of Smokes (Indian Name) (1781)
X** 09 04 99 99 00 Nine blacks denied entry into Central High School in Arkansas. (1957)
X** 09 05 99 99 00 11 Israeli athletes and 5 Arab guerrillas who had taken them hostage were killed in a shoot-out at the summer Olympics in Munich (1972)
X** 09 05 99 99 00 1st gasoline pump is delivered to a gasoline dealer. (1885)
X** 09 05 99 99 00 Battle of Virginia Capes, where the French Fleet defeats the British rescue fleet, trapping Cornwallis at Yorktown (1781)
X** 09 05 99 99 00 First Continental Congress convened (Philadelphia, 1774)
X** 09 05 99 99 00 Iva Toguri D'Aquino, Japanese-American suspected of being Tokyo Rose, was arrested in Yokohama (1945)
X** 09 05 99 99 00 Kennedy orders resumption of underground nuclear tests (1961)
X** 09 05 99 99 00 President Gerald Ford escaped an attempt on his life by Lynette "Squeaky" Fromme in Sacramento, California (1975)
X** 09 05 99 99 00 Russia's Peter the Great imposed a tax on beards. (1698)
X** 09 05 99 99 00 Sam Houston was elected president of the Republic of Texas (1836)
X** 09 05 99 99 00 The first battle of the Marne began in World War I (1914)
X** 09 05 99 99 00 The nation's first Labor day parade was held in New York (1882)
X** 09 06 99 99 00 Word is received that Perry has reached the North Pole and died (1909)
X** 09 07 99 99 00 Desmond Tutu was installed as the first black to lead the Anglican Church in South Africa (1986)
X** 09 07 99 99 00 Fire storms surround the Old Faithful Lodge complex in Yellowstone National Park as massive fires continue to burn out of control in Western forest lands. The Lodge survives. (1988)
X** 09 07 99 99 00 German begins its blitz on London and will continue bombing every night for two more months (1940)
X** 09 07 99 99 00 The Boxer Rebellion in China ends (1901)
X** 09 08 99 99 00 1st US Air Mail service begins. (1920)
X** 09 08 99 99 00 1st permanent settlement in US founded at St Augustine, Florida (1565)
X** 09 08 99 99 00 Feast of the Nativity of the Virgin Mary, instituted (695)
X** 09 08 99 99 00 Gerald R. Ford pardons former President Richard M. Nixon (1974)
X** 09 08 99 99 00 Harvard College is established with the help of 800 pounds from Rev. John Harvard (1636)
X** 09 08 99 99 00 Lincoln makes a speech about when you can fool people. (1858)
X** 09 08 99 99 00 a small English fleet takes New Amsterdam and names it New York (1664)
X** 09 09 99 99 00 27 year old Abe Lincoln received license to practice law (1836)
X** 09 09 99 99 00 Alfred Dreyfus went on trial a second time for disclosing French secrets (1899)
X** 09 09 99 99 00 California becomes the 31st state (1850)
X** 09 09 99 99 00 Continental Congress decrees that United Colonies be called United States (1776)
X** 09 09 99 99 00 Ed Greer, a Hughes Aircraft electronics engineer, goes to lunch and never returns. A party is held in his honor every year celebrating his escape from the corporate world. (1981)
X** 09 10 99 99 00 Elias Howe receives patent for his sewing machine. (1846)
X** 09 10 99 99 00 Ellis Island opens as a park honoring the immigrants (1990)
X** 09 10 99 99 00 John Smith elected president of the Jamestown colony council. (1608)
X** 09 10 99 99 00 Lincoln Highway opens as 1st paved coast-to-coast highway. (1913)
X** 09 10 99 99 00 Mormons, embittered by religious persecution, attack and kill Gentile wagon train in what was to become known as the Mountain Meadows Massacre. (1857)
X** 09 10 99 99 00 Swanson sells it's first "TV Dinner". (1953)
X** 09 11 99 99 00 1st commercially successful electric bus line opens, in Hollywood. (1910)
X** 09 11 99 99 00 Alexander Hamilton was appointed the 1st U.S. sec. of the Treasury. (1789)
X** 09 11 99 99 00 Aloha Tower dedicated (in Honolulu). (1926)
X** 09 11 99 99 00 Americans defeated at Brandywine, Pennsylvania by General Howe (1777)
X** 09 11 99 99 00 Chinese and Indian forces engage in heavy fighting on the border of Sikkim in the Himalayas (1967)
X** 09 11 99 99 00 Hungary, under pressure from refugees, suspends treaty with East Germany and lets thousands of "vacationing" East Germans across the border into West Germany (1989)
X** 09 11 99 99 00 Sebastopol is taken by Allies after capitulation of the Russian forces. (1855)
X** 09 11 99 99 00 U.S. captures British flotilla on Lake Champlain (1814)
X** 09 12 99 99 00 Canyonlands National Park is established (1964)
X** 09 12 99 99 00 Emperor Haile Selassie of Ethiopia is deposed by military coup (1974)
X** 09 12 99 99 00 English explorer Henry Hudson sailed into the river that now bears his name (1609)
X** 09 12 99 99 00 German paratroopers rescue Mussolini from captivity in Rome (1943)
X** 09 12 99 99 00 Germany annexes Sudentenland (1938)
X** 09 12 99 99 00 Joseph Cicippio, acting comptroller at the American University in Beirut, is kidnapped in Lebanon (1986)
X** 09 12 99 99 00 Steven Biko, black student leader, dies whilst in the custody of the South African security services (1977)
X** 09 13 99 99 00 136.4 degrees F (el Azizia, Libya, 1922)
X** 09 13 99 99 00 British defeat the French at Abraham near Quebec City (1788)
X** 09 13 99 99 00 Building of Hadrian's Wall began (122)
X** 09 13 99 99 00 Chiang Kai-Shek becomes president of China (1943)
X** 09 13 99 99 00 In the Caribbean hurricane Gilbert grows to a category 5 hurricane with 175 mph sustained winds and the lowest recorded barometric pressure ever recorded in the Western Hemisphere, 26.22 inches of mercury. (1988)
X** 09 13 99 99 00 New York City becomes the capitol of the United States. (1788)
X** 09 13 99 99 00 first lobotomy performed (1848)
X** 09 14 99 99 00 1st lighthouse in US is lit (in Boston Harbor). (1716)
X** 09 14 99 99 00 Benjamin Franklin sent to France as American minister (1778)
X** 09 14 99 99 00 Francis Scott Key writes words to "Star Spangled Banner" (1814)
X** 09 14 99 99 00 General Winfield Scott and his U.S. forces take control of Mexico City (1847)
X** 09 14 99 99 00 Salem, Massachusetts, founded (1629)
X** 09 14 99 99 00 Selective Service Act establishes first peacetime draft (1940)
X** 09 14 99 99 00 While in New York, Henry Bliss becomes 1st automobile fatality (1899)
X** 09 14 99 99 00 the typewriter ribbon is patented. (1886)
X** 09 15 99 99 00 1789, The U.S. Government adopts the "Great Seal of the United States", taking it from Congress and placing it in the custody of the Secretary of State
X** 09 15 99 99 00 Costa Rica, El Salvador, Guatamala, Honduras & Nicaragua all gain their independence (1821)
X** 09 15 99 99 00 Four children were killed when a bomb went off during services at a black Baptist church in Alabama (1963)
X** 09 15 99 99 00 New York is taken by General Howe (1776)
X** 09 15 99 99 00 Soviet Premier Nikita Khrushchev begins 13 day tour of U.S. (1959)
X** 09 15 99 99 00 The Nuremberg Laws deprived German Jews of their citizenship and made the swastika the official symbol of Nazi Germany (1935)
X** 09 15 99 99 00 The U.S. Foreign Affairs Department becomes the U.S. State Department (1789)
X** 09 15 99 99 00 The bank rate in Germany exceeds 90% (1923)
X** 09 15 99 99 00 tanks were used in battle for the first time, at Flers in the Somme Offensive, by the British Machine Gun Corps (1916)
X** 09 16 99 99 00 After two false starts, 149 Pilgrims set forth from England aboard the Mayflower (1620)
X** 09 16 99 99 00 Great Seal of the United States is used for 1st time. (1782)
X** 09 16 99 99 00 Patent is issued for the typesetting machine. (1857)
X** 09 16 99 99 00 The Massachusetts village of Shawmut changed its name to Boston. (1630)
X** 09 16 99 99 00 the American Legion is incorporated. (1919)
X** 09 17 99 99 00 Battle of Antietam (1862)
X** 09 17 99 99 00 Jay Cooke & Co. fails, causing a securities panic (1873)
X** 09 17 99 99 00 The American Kennel club was founded (1884)
X** 09 17 99 99 00 US Constitution is adopted. (1787)
X** 09 17 99 99 00 Vanessa Williams became the first black to be crowned Miss America. (1983)
X** 09 18 99 99 00 "The New York Times" goes on sale, at 2 cents a copy. (1851)
X** 09 18 99 99 00 Chile gains it's independence. (1810)
X** 09 18 99 99 00 Newspaper heiress Patricia Hearst was captured in San Francisco by the FBI, nineteen months after she was kidnapped (1975)
X** 09 18 99 99 00 Nikita Khrushchev says, "Those who wait for that (Russia rejecting communism) must wait until a shrimp learns to whistle." (1955)
X** 09 18 99 99 00 Pres. George Washington laid the cornerstone of the U.S. Capitol. (1793)
X** 09 18 99 99 00 The French formally surrendered Quebec to the British. (1759)
X** 09 19 99 99 00 1st commercial laundry established, in Oakland, California. (1849)
X** 09 19 99 99 00 A 7.8 magnitude earthquake off the west coast of Mexico does extensive damage to Mexico City (1985)
X** 09 19 99 99 00 Bruno Hauptmann was arrested in New York and charged with the kidnap-murder of the Lindbergh infant (1934)
X** 09 19 99 99 00 President Lincoln's body was removed to go to its permanent resting place in Springfield, Illinois (1871)
X** 09 20 99 99 00 Black student, James Meredith, was blocked from enrolling at the University of Mississippi; he was later admitted (1962)
X** 09 20 99 99 00 Equal Rights Party nominates Belva Lockwood for President (1884)
X** 09 20 99 99 00 First meeting of American Association for the Advancement of Science (1848)
X** 09 20 99 99 00 First meeting of National Research Council (1916)
X** 09 20 99 99 00 Magellan leaves Spain on first circumnavigation (1519)
X** 09 20 99 99 00 Patent granted on the electric range. (1859)
X** 09 20 99 99 00 US frigate "Constitution" (Old Ironsides) launched in Boston. (1797)
X** 09 21 99 99 00 1st auto manufacturer opens -- Duryea Motor Wagon Company. (1895)
X** 09 21 99 99 00 Johann Ostermeyer patents his invention, the flashbulb. (1930)
X** 09 21 99 99 00 Stonehenge was auctioned off to C. H. E. Chubb, of Salisbury for 6,600 pounds. (1915)
X** 09 21 99 99 00 US Helicopters attack Iranian ship laying mines in the Persian Gulf (1987)
X** 09 21 99 99 00 the nuclear submarine "Nautilus" is commissioned. (1954)
X** 09 22 99 99 00 Allied Forces form independent nation West Germany (1953)
X** 09 22 99 99 00 First Soviet atomic bomb explodes (1949)
X** 09 22 99 99 00 General Idi Amin gives Uganda's 8000 Asians 48 hours to leave the country (1972)
X** 09 22 99 99 00 Joseph Smith, founder of the The Church of Jesus Christ of Latter-day Saints (the Mormons), receives the plates from which the Book of Mormon was translated (1827)
X** 09 22 99 99 00 Patent is granted for the Ice Cream Cone. (1903)
X** 09 22 99 99 00 President Lincoln issues the Emancipation Proclamation (1863)
X** 09 22 99 99 00 Special prosecutor Leon Jeworski subpoenas President Nixon (1974)
X** 09 22 99 99 00 The Mustang Ranch, a famous Nevada brothel, is shutdown by the IRS for past due taxes. A motion to have the government run the lucrative business fails for some reason. :-) (1990)
X** 09 22 99 99 00 Two men and seven women were executed for witchcraft in Salem, Massachusetts. One was pressed to death for standing mute while the others were hung. (1692)
X** 09 23 99 99 00 Harvard College held its first commencement. (1642)
X** 09 23 99 99 00 John Andre reveals Benedict Arnold's plot to betray West Point. (1780)
X** 09 23 99 99 00 Naval engagement between 'Bonhomme Richard' and 'HMS Serepis'. (1779)
X** 09 23 99 99 00 Phillippine President Ferdinand Marcos declares martial law (1972)
X** 09 23 99 99 00 Truman announces that the Soviets have set off their first atomic bomb within the last few weeks (1949)
X** 09 23 99 99 00 V.P. Nixon denies campaign fund fraud with his "Checkers" speech. (1952)
X** 09 24 99 99 00 1st atomic powered aircraft carrier, the "Enterprise", is launched. (1960)
X** 09 24 99 99 00 1st round-the-world trip by a woman on a bicycle (took 15 months). (1895)
X** 09 24 99 99 00 1st round-the-world trip by yacht (Cornelius Vanderbilt). (1853)
X** 09 24 99 99 00 Barbara Harris, is elected the first woman bishop in the Episcopal Church (1988)
X** 09 24 99 99 00 Black Friday: Thousands of business are ruined after Jay Gould and James Fisk try to corner the Gold market (1869)
X** 09 24 99 99 00 Congress creates the Post Office. (1789)
X** 09 24 99 99 00 Congress passes the First Judiciary Act which provides for an Attorney General and a Supreme Court (1789)
X** 09 24 99 99 00 Patricia Hearst is sentenced to seven years in prison (she will serve only 22 months before being released under presidential order from President Carter) (1976)
X** 09 24 99 99 00 President Eisenhower suffers a heart attack after during a vacation in Denver (1955)
X** 09 24 99 99 00 The USS Enterprise, the first nuclear powered aircraft carrier, is launched in Newport News, Va. (1960)
X** 09 24 99 99 00 The trail of the Chicago Eight (later seven) begins (1969)
X** 09 24 99 99 00 Wilford Woodruff, president of The Church of Jesus Christ of Latter-day Saints issues a declaration affirming that the Church no longer teaches nor performs plural marriage. (1890)
X** 09 25 99 99 00 Columbus sailed on his second voyage to America. (1493)
X** 09 25 99 99 00 King Harold defeats Tostig at Stamford Bridge (1066)
X** 09 25 99 99 00 Pres. Harrison signed a measure establishing Sequoia National Park. (1890)
X** 09 25 99 99 00 Sandra Day O'Connor becomes first woman on U.S. Supreme Court (1981)
X** 09 25 99 99 00 The first session of the first Congress of the United States met in New York and voted 10 amendments to the constitution (the Bill of Rights) (1789)
X** 09 25 99 99 00 Transatlantic telephone service begins (1956)
X** 09 25 99 99 00 Twelfth amendment (Presidential elections) is passed (1804)
X** 09 25 99 99 00 Vasco Nunez de Balboa is the 1st European to sail the Pacific Ocean. (1513)
X** 09 26 99 99 00 Sir Francis Drake arrives with ships full of plunder from Spain (1580)
X** 09 26 99 99 00 Thomas Jefferson was appointed America's first secretary of State. (1789)
X** 09 26 99 99 00 United Nations troops in the Korean War recaptured the South Korean capitol of Seoul from the North Koreans (1950)
X** 09 26 99 99 00 two dragons are said to have fought at "Sharpfight Meadow" at Little Conrad in Suffolk (1449)
X** 09 27 99 99 00 Democratic National Committee voted to admit women. (1919)
X** 09 27 99 99 00 First passenger conveyed by locomotive (England, 1825)
X** 09 27 99 99 00 King Constantine I of Greece abdicates (1922)
X** 09 27 99 99 00 Royal Albert Docks lighted by twenty-six electric lamps (1880)
X** 09 27 99 99 00 The Royal navy sinks the Bismarck off the Brest Coast (1941)
X** 09 27 99 99 00 The ocean liner Queen Elizabeth was launched at Glasgow. (1938)
X** 09 27 99 99 00 William Howe occupies Philadelphia (1777)
X** 09 28 99 99 00 "God save the King" sung for the first time following the defeat of English forces by Jacobites (1745)
X** 09 28 99 99 00 American forces backed by a French fleet begin their siege of Yorktown Heights, Virgina (1781)
X** 09 28 99 99 00 Betty Ford, First Lady, undergoes a mastectomy at Bethesda Naval Hospital (1974)
X** 09 28 99 99 00 Germany and the Soviet Union agree on how to partition Poland (1939)
X** 09 28 99 99 00 Greek soldier runs over 26 miles to report Persian defeat at Marathon, then dies (490 BC)
X** 09 28 99 99 00 Portuguese navigator Juan Rodriguez Cabrilo sails into the bay on which San diego is now located (1542)
X** 09 28 99 99 00 The U.N. Security Council unanimously adopts a resolution the Iraq and Iran should cease hostilities (1980)
X** 09 28 99 99 00 William the Conqueror invades England (1066)
X** 09 28 99 99 00 flogging is abolished as a form of punishment in the U.S. Navy (1850)
X** 09 29 99 99 00 Cyanide laced Tylenol capsules killed seven in Chicago. (1982)
X** 09 29 99 99 00 David Belasco, impressario, opens his first theater (1902)
X** 09 29 99 99 00 Parliament of one day, King Richard II is deposed (1399)
X** 09 29 99 99 00 The London Police, remodeled by Sir Robert Peel, begin duty (1829)
X** 09 29 99 99 00 The U.S. War Department establishes a regular army of several hundred soldiers (1789)
X** 09 29 99 99 00 U.S. and Itay sign armistice treaty on a ship off the coast of Malta (1943)
X** 09 30 99 99 00 Franklin D. Roosevelt dedicates Boulder Dam (1935)
X** 09 30 99 99 00 Mikhail Gorbachev retires President Andrei Gromyko from the Politburo and fires other old guard leaders in a Kremlin shakeup (1989)
X** 09 30 99 99 00 New York City fluoridates its water to the protest of many (1965)
X** 09 30 99 99 00 The Berlin Airlift ends (1949)
X** 09 30 99 99 00 The Siege of Yorktown, Virginia, begins (1781)
X** 09 30 99 99 00 The first U. S. hydroelectric power plant was opened in Appleton Wisconson. A single dynamo of 180 lights each of ten candle power was erected. (1882)
X** 09 30 99 99 00 The first execution in the English American Colonies takes place as John Billington is hanged (1630)
X** 09 30 99 99 00 The first tooth is extracted under anesthesia in Charleston, Mass (1846)
X** 09 30 99 99 00 The verdicts of the Nuremberg trials are announced, finding 22 top Nazi leaders guilty of war crimes (1946)
X** 10 01 99 99 00 1st postcards are issued in Vienna. (1869)
X** 10 01 99 99 00 General Franco is appointed Spain's chief of state by Spanish rebels (1936)
X** 10 01 99 99 00 Henry Ford introduces the Model T car. (1908)
X** 10 01 99 99 00 Henry Huntington buys the Los Angeles Railway. (1898)
X** 10 01 99 99 00 Nigeria gains it's independence. (1960)
X** 10 01 99 99 00 Spain sells Louisiana to France in a secret treaty (1800)
X** 10 01 99 99 00 Special delivery mail service began in the United States. (1885)
X** 10 01 99 99 00 The Nuclear Test Ban Treaty, signed by the U. S., Britain and U. S. S. R. comes into effect (1963)
X** 10 01 99 99 00 Troops dispatched to arrest Brigham Young for lewdly cohabitating with 16 young women (1871)
X** 10 01 99 99 00 Walt Disney World in Orlando, Florida opens. (1971)
X** 10 01 99 99 00 Yosemite becomes a National Park. (1896)
X** 10 02 99 99 00 Darwin returns to England aboard the HMS Beagle. (1836)
X** 10 02 99 99 00 Ferdinand Foch, believed to be the leader responsible for Allies winning World War I (1851)
X** 10 02 99 99 00 German army began Operation Typhoon (all-out drive against Moscow). (1941)
X** 10 02 99 99 00 Guinea gains it's independence. (1958)
X** 10 02 99 99 00 Hans Lippershey offers the Dutch government a new invention -- the telescope (1608)
X** 10 02 99 99 00 Rome and its provinces are formally made part of Italy and Rome is declared the capital (1870)
X** 10 02 99 99 00 This is the first day for the new united Germany (reunification day) (1990)
X** 10 02 99 99 00 Thurgood Marshall sworn as first black Supreme Court Justice (1967)
X** 10 03 99 99 00 A national flag day was held for the Belgian Relief Fund in England (this was probably the world's first flag day) (1914)
X** 10 03 99 99 00 Federal Income Tax is signed into law (at 1%). (1913)
X** 10 03 99 99 00 Lincoln designates the last Thursday in November as Thanksgiving Day (1863)
X** 10 03 99 99 00 Serbo-Croat-Slovene Kingdom becomes the country of Yugoslavia (1929)
X** 10 03 99 99 00 The first British atomic bomb test (1952)
X** 10 03 99 99 00 Washington proclaims the 1st national Thanksgiving Day on Nov 26 (1789)
X** 10 04 99 99 00 Crimean war begins (1853)
X** 10 04 99 99 00 George Washington is defeated at Germantown, Pennsylvania (1777)
X** 10 04 99 99 00 The bill establishing Dinosaur National Monument is signed (1915)
X** 10 05 99 99 00 Former PTL evangelist Jim Bakker was convicted of using his television show to defraud followers of $3.7 million (1989)
X** 10 05 99 99 00 The ABM early warning system, Thule Greenland, detects the moonrise as a large Russian missile contingent headed for the US (1960)
X** 10 05 99 99 00 The Revolutionary Calendar is adopted in France. This day becomes 14 Vendemiaire (grape harvest) Year II. Months were named for seasonal characteristics and years from the beginning of the revolution. (1793)
X** 10 05 99 99 00 part of a fuel core of an experimental breeder reactor near Detroit melts down (1966)
X** 10 06 99 99 00 Antioch College is the first public school to admit both men and women (1853)
X** 10 06 99 99 00 Israel is attacked by the forces of Egypt and Syria, 4th Israeli war begins (1973)
X** 10 06 99 99 00 LSD is made an illegal drug (1966)
X** 10 06 99 99 00 Pope John Paul II became the 1st pontiff to visit the White House. (1979)
X** 10 06 99 99 00 the Mormons abolish polygamy by general conference declaration that the president of the church's declaration of Sep 24 is "authoritative and binding" (1890)
X** 10 07 99 99 00 Foundation of German Democratic Republic (1949)
X** 10 07 99 99 00 Granite Railway (1st chartered railway in US) begins operations (1826)
X** 10 07 99 99 00 Maryland Governor Marvin Mandel sent to prison on fraud charges (1977)
X** 10 07 99 99 00 Mother Teresa of Calcutta awarded the Nobel Peace Prize (1979)
X** 10 07 99 99 00 Police stop the car of Senator Wilbur Mills, stripper Fanne Fox jumps into fountain (1974)
X** 10 07 99 99 00 The Windscale nuclear pile north of Liverpool, England catches fire and burns for several days releasing radiation. 39 cancer deaths attributed to the leak. (1957)
X** 10 08 99 99 00 Dow Jones starts reporting an average of industrial stocks. (1896)
X** 10 08 99 99 00 First VisiCalc prototype (1978)
X** 10 08 99 99 00 Great Chicago Fire (1871)
X** 10 08 99 99 00 Mohammed, the prophet of Islam makes public entrance to Medina marking the beginning of the Moslem era (622)
X** 10 08 99 99 00 The Equal Rights Amendment ratification deadline is extended (1978)
X** 10 08 99 99 00 The Great Fire destroys over 4 square miles of Chicago. (1871)
X** 10 09 99 99 00 First two-way telephone conversation (1876)
X** 10 09 99 99 00 James Watt forced to resign as Secretary of the Interior (1983)
X** 10 09 99 99 00 Leif Ericson discovers "Vinland" (possibly New England) (1000)
X** 10 09 99 99 00 Mission Delores founded. (1776)
X** 10 09 99 99 00 The Collegiate School of Connecticut (later Yale Univ.) was chartered in New Haven (1701)
X** 10 09 99 99 00 The Washington Monument opened. (1888)
X** 10 09 99 99 00 The first generator at Boulder (later Hoover) Dam began transmitting electricity to Los Angeles (1936)
X** 10 10 99 99 00 Spiro T. Agnew resigns as Vice-President due to income tax fraud (1973)
X** 10 10 99 99 00 the Manchu Dynasty is overthrown in China. (1911)
X** 10 11 99 99 00 Daughters of the American Revolution founded. (1890)
X** 10 11 99 99 00 The Gang of Four are arrested in Peking (1976)
X** 10 11 99 99 00 The first steam-powered ferry was put into operation between New York City and Hoboken, New Jersey (1811)
X** 10 11 99 99 00 The second Vatican Eccumenical Council opens in Rome (1962)
X** 10 12 99 99 00 American naval forces defeat the Japanese at the Battle of Cape Esperance (1942)
X** 10 12 99 99 00 Columbus lands in Bahamas (1492)
X** 10 12 99 99 00 John Dillinger, bank robber, escapes Allen County, Ohio jail with the help of his gang and killed the Sheriff (1933)
X** 10 12 99 99 00 Khrushchev pounds his desk with shoe during a speech to the UN (1960)
X** 10 12 99 99 00 President Nixon nominated Gerald Ford of Michigan to succeed Spiro Agnew as vice-president (1973)
X** 10 13 99 99 00 Dolly Parton's band uniform number 39 was retired by the Sevier County High School. She played the snare drum. (1977)
X** 10 13 99 99 00 George Washington lays the cornerstone for the Executive Mansion, later to be called the White House (1792)
X** 10 13 99 99 00 Italy declares war on Germany (1943)
X** 10 13 99 99 00 The Jewish organization B'nai B'rith was founded in New York. (1843)
X** 10 13 99 99 00 The stockmarket falls 190 points in a minor crash (1989)
X** 10 14 99 99 00 1st declaration of colonial rights in America. (1774)
X** 10 14 99 99 00 Battle of Hastings, in which William the Conqueror wins England (1066)
X** 10 14 99 99 00 British Computer Society founded (1957)
X** 10 14 99 99 00 Martin Luther King Jr. was named winner of the Nobel Peace Prize. (1964)
X** 10 14 99 99 00 President Ford escaped injury when his limousine was hit broadside by a car in Hartford, Conn (1975)
X** 10 15 99 99 00 First draft card burned (1965)
X** 10 15 99 99 00 Florence Nightingale is solicited to organize nurses in Crimea (1854)
X** 10 15 99 99 00 Grace Bedell writes to Lincoln, tells him to grow a beard. (1860)
X** 10 15 99 99 00 The first swarm of killer bees to be found in the U. S. is destroyed in Texas. (1990)
X** 10 16 99 99 00 China's first atomic bomb is exploded (1964)
X** 10 16 99 99 00 Polish Cardinal Karol Wojtyla elected Pope and takes the name John Paul II (1978)
X** 10 16 99 99 00 a hotel in Boston becomes the 1st to have indoor plumbing. (1869)
X** 10 16 99 99 00 body washed ashore in Syria is identified as Leon Klinghoffer, slain in hijacking of Achille Lauro (1985)
X** 10 17 99 99 00 A earthquake measured at 6.9-7.1 on the Richter scale hits San Francisco at 5:04 pm killing nearly 300 people and doing billions of dollars in damage. (1989)
X** 10 17 99 99 00 Al Capone, mobster, convicted of income tax evasion (1931)
X** 10 17 99 99 00 Albert Einstein, physicist, arrives in the United States as a refugee from Nazi Germany (1933)
X** 10 17 99 99 00 Columbus sights the isle of San Salvador. (1492)
X** 10 17 99 99 00 Juan Peron, dictator, stages coup and gains control of Argentina (1945)
X** 10 17 99 99 00 Knickerbocker Engine Co. Number 5 organized. (1850)
X** 10 17 99 99 00 Mother Teresa of India was awarded the Nobel peace prize (1979)
X** 10 17 99 99 00 President Carter signed a bill restoring citizenship to Confederate President Jefferson Davis (1978)
X** 10 17 99 99 00 a fuel loading error at the Saint-Laurent reactor in France leads to a partial meltdown (1969)
X** 10 17 99 99 00 first Ann Landers column is printed (1955)
X** 10 18 99 99 00 1st commercial long-distance phone line opens (Chicago - New York) (1892)
X** 10 18 99 99 00 Boston Shoemakers form first American labor organization (1648)
X** 10 18 99 99 00 British Broadcasting Corporation established. (1922)
X** 10 18 99 99 00 The American flag was raised in Puerto Rico shortly before Spain formally gave control to the U.S. (1898)
X** 10 18 99 99 00 The Burma Road is reopened by the Britsh (1940)
X** 10 18 99 99 00 The Mason-Dixon line was established. (1767)
X** 10 18 99 99 00 The last lottery is held in England (1826)
X** 10 18 99 99 00 The raid on Harper's Ferry is led by John Brown (1859)
X** 10 18 99 99 00 U.S. Olympic Committee suspended two black athletes for giving a "black power" salute during a victory ceremony in Mexico City (1968)
X** 10 18 99 99 00 the United States take possession of Alaska. (1869)
X** 10 19 99 99 00 American ships attack two off-shore platforms used by the Iranians to attack shipping in the Persian Gulf (1987)
X** 10 19 99 99 00 General Cornwallis and 7000 of his men surrender at Yorktown (1781)
X** 10 19 99 99 00 Mao Tse-tung establishes the People's Republic of China (1949)
X** 10 19 99 99 00 Napoleon's defeated army begins long retreat from Moscow (1812)
X** 10 19 99 99 00 The League of Nations imposes sanctions against Italy for its invasion of Abyssinia (1935)
X** 10 19 99 99 00 The stock market crashed as the Dow Jones Industrial Average plunged 508 points, its worst one-day decline (1987)
X** 10 20 99 99 00 "Saturday Night Massacre", Watergate Special Prosecutor, Archibald Cox, dismissed by president Nixon. Attorney General Elliot Richardson and Assistant Attorney General Ruckelshaus resign. (1973)
X** 10 20 99 99 00 Battle of Sekigahara, which established the Tokugawa clan as rulers of Japan (SHOGUN) until 1865 (1600)
X** 10 20 99 99 00 Dr Lee DeForest gives a demonstration of his radio tube. (1906)
X** 10 20 99 99 00 OPEC oil embargo begins (1973)
X** 10 20 99 99 00 Spain gives Florida to the United States. (1820)
X** 10 20 99 99 00 The Senate voted to convict U.S. District Judge Alcee Hastings of eight articles of impeachment and remove him from office (1989)
X** 10 20 99 99 00 The reading room of the British Museum was first lighted with electricity (1879)
X** 10 21 99 99 00 Battle of Trefalgar, where Nelson established British naval supremacy for the next century (1805)
X** 10 21 99 99 00 Edison makes the first practical incandescent lamp (1879)
X** 10 21 99 99 00 Edward Austin Tracy, an American living in Beirut, was kidnapped in Lebanon (1986)
X** 10 21 99 99 00 Guggenheim Museum opens (1959)
X** 10 22 99 99 00 Chester Carlson invents xerography (1938)
X** 10 22 99 99 00 John F Kennedy announces USSR has missile bases in Cuba (1962)
X** 10 22 99 99 00 Princeton is chartered (1746)
X** 10 22 99 99 00 The Great Disappointment. The Millerites, a popular religous sect of the era, predict the second coming will happen on this day and are very disappointed (1844)
X** 10 22 99 99 00 The Surgeon General releases his first report on AIDS (1986)
X** 10 22 99 99 00 US National debt topped $1 TRILLION (nothing to celebrate). (1981)
X** 10 22 99 99 00 the Israeli destroyer Eilat is sunk by Egyptian missiles (1967)
X** 10 23 99 99 00 A suicide truck-bomber crashed into the U.S. compound in Beirut, killing 241 U.S. marines and sailors (1983)
X** 10 23 99 99 00 Battle of Leyte Gulf begins (1944)
X** 10 23 99 99 00 Confederate Sterling Price is defeated in the last Civil War action west of the Mississippi (1864)
X** 10 23 99 99 00 First Parliament of Great Britain meets (1707)
X** 10 23 99 99 00 The battle of Edgehill was fought in English Civil War (1642)
X** 10 23 99 99 00 The first meeting of the United Nations General Assembly (1946)
X** 10 23 99 99 00 the ill-fated revolt in Communist Hungary starts, later crushed by Soviet tanks (1956)
X** 10 24 99 99 00 Cuban blockade of Russian shipping begins (1962)
X** 10 24 99 99 00 The 40-hour workweek went into effect under the Fair Labor Standards Act of 1938 (1940)
X** 10 24 99 99 00 To repay a loan on her Texas Ranch, Mrs Anna Taylor goes over Niagara Falls in a barrel and is the first person to survive the attempt (1901)
X** 10 24 99 99 00 end of Thirty Years War (1648)
X** 10 24 99 99 00 fictitious person John Doe officially put to death to end the use of the name to hide the names of real or imagined witnesses in English courts (1852)
X** 10 25 99 99 00 Adlai Stevenson presents photographic evidence of Russian missile bases in Cuba (1962)
X** 10 25 99 99 00 Battle of Agincourt, where the Welsh longbow defeats the armored knight (1415)
X** 10 25 99 99 00 Charge of the Light Brigade took place in the Battle of Balaklava in the Crimean War (1854)
X** 10 25 99 99 00 Erie Canal opens for business in New York. (1825)
X** 10 25 99 99 00 The UN removes Taiwan and admits the People's Republic of China (1971)
X** 10 25 99 99 00 U.S. Marines and Rangers invaded Grenada. (1983)
X** 10 26 99 99 00 An investor who suffered heavy stock market losses shot and killed a Miami brokerage manager, wounded another then committed suicide (1987)
X** 10 26 99 99 00 Erie Canal opens (1825)
X** 10 26 99 99 00 International Atomic Energy Agency established. (1956)
X** 10 26 99 99 00 Shootout at the OK corral, in Tombstone, Arizona. (1881)
X** 10 26 99 99 00 Telegraph service inaugurated in US (end of Pony Express). (1861)
X** 10 26 99 99 00 The first appearance of Asiatic Cholera in England, at Sutherland (1831)
X** 10 26 99 99 00 UN's World Health Organization declares smallpox eradicated (1978)
X** 10 26 99 99 00 United Nations Charter goes into effect. (1945)
X** 10 27 99 99 00 Captain James Cook, discovered the Sandwich Islands. (1728)
X** 10 27 99 99 00 Du Pont announces that it has coined the term Nylon (1938)
X** 10 27 99 99 00 Egyptian President Anwar Sadat and Israeli Prime Minsiter Menachem Begin were awarded the Nobel Peace Prize. (1978)
X** 10 27 99 99 00 New York City's Boss Tweed arrested on fraud charges (1871)
X** 10 27 99 99 00 New York opens 1st section of it's subway system. (1904)
X** 10 27 99 99 00 RH Macy & Co. opens 1st store, on 6th Avenue, New York City. (1858)
X** 10 28 99 99 00 Columbus discovers Cuba (1492)
X** 10 28 99 99 00 Constantine's army defeats forces of Maxentius at Mulvian Bridge (312)
X** 10 28 99 99 00 Eli Whitney gets a patent for the Cotton Gin.
X** 10 28 99 99 00 German rocket engineers begin work in USSR (1946)
X** 10 28 99 99 00 Harvard University was founded in Massachusetts (1636)
X** 10 28 99 99 00 St. Louis Police try a new investigation method - fingerprints. (1904)
X** 10 28 99 99 00 Statue of Liberty was dedicated on Bedloe's Island (1886)
X** 10 28 99 99 00 Volstead Act passed by Congress, starting Prohibition. (1919)
X** 10 28 99 99 00 the Gateway Arch (630 feet high) completed in St. Louis, Missouri. (1965)
X** 10 29 99 99 00 "Black Tuesday", the Stock Market crash. (1929)
X** 10 29 99 99 00 1st College Fraternity founded. (1833)
X** 10 29 99 99 00 International Committee of the Red Cross founded. (1863)
X** 10 29 99 99 00 Reform riots in Bristol (1831)
X** 10 29 99 99 00 Turkey is proclaimed to have a republican government. (1923)
X** 10 30 99 99 00 Helena, capital of Montana, founded. (1864)
X** 10 30 99 99 00 The U.S. government announced the end of shoe rationing. (1945)
X** 10 30 99 99 00 U.S. Navy born, authorized by the Second Continental Congress (1775)
X** 10 31 99 99 00 Brooklyn, NY ends streetcar service. (1956)
X** 10 31 99 99 00 Luther nails 95 Theses to door of Castle Church, Wittenberg (1517)
X** 10 31 99 99 00 Nevada becomes the 36th state (1864)
X** 10 31 99 99 00 President Lyndon B. Johnson ordered a halt to U.S. bombing of North Vietnam, hoping his action would lead to peace talks (1968)
X** 10 31 99 99 00 The French and English channel tunnel teams meet by using a 2 inch probe. The tunnels are off by only 20 inches. (1990)
END_OF_FILE
if test 36289 -ne `wc -c <'dates/events5'`; then
    echo shar: \"'dates/events5'\" unpacked with wrong size!
fi
# end of 'dates/events5'
fi
if test -f 'dpaint.c' -a "${1}" != "-c" ; then
  echo shar: Will not clobber existing file \"'dpaint.c'\"
else
echo shar: Extracting \"'dpaint.c'\" \(16033 characters\)
sed "s/^X//" >'dpaint.c' <<'END_OF_FILE'
X/*
X * $Header: dpaint.c,v 2.7 91/03/27 16:45:29 billr Exp $
X */
X/*
X * dpaint.c
X *
X * Author: Philip Heller, Sun Microsystems. Inc. <terrapin![e-mail]>
X *
X * Original source Copyright (C) 1987, Sun Microsystems, Inc.
X *    All Rights Reserved
X * Permission is hereby granted to use and modify this program in source
X * or binary form as long as it is not sold for profit and this copyright
X * notice remains intact.
X *
X *
X * Changes/additions by: Bill Randle, Tektronix, Inc. <[e-mail]>
X *
X * Changes and additions Copyright (C) 1988, 1989, 1991 Tektronix, Inc.
X *    All Rights Reserved
X * Permission is hereby granted to use and modify the modifications in source
X * or binary form as long as they are not sold for profit and this copyright
X * notice remains intact.
X */
X/***************************************************
X *                           *
X *    Artistic routines that draw in the main    *
X * subwindow for the day display.           *
X *                           *
X ***************************************************/
X
X#include <ctype.h>
X#include <sys/time.h>
X#include <stdio.h>
X#ifndef NOTOOL
X#include <suntool/sunview.h>
X#include <suntool/canvas.h>
X#endif
X#include "ct.h"
X#include "paint.h"
X#ifndef NOTOOL
X#include "riseset.h"
X#define J1970   2440587.5 /* VAX clock Epoch 1970 Jan 1 (0h UT) */
X
X#ifndef NO_SUN_MOON
Xextern Frame mframe, sframe;
Xextern Canvas mcanvas, scanvas;
Xextern Panel_item mdate_pi, sdate_pi;
X#endif  /* NO_SUN_MOON */
Xextern Pixrect *leftarrow, *rightarrow;
Xextern Pixrect *arrowshaft_pr, *arrowhead_pr;
Xextern Pixrect *gr_arrowshaft_pr, *gr_arrowhead_pr;
Xextern char riseset_buf[][64];
Xextern int old_slot;
X#endif  /* NOTOOL */
Xextern int day_message_size;
Xextern int show_future;
Xextern int new_entry;
Xextern int findex;        /* index into struct future array */
Xextern struct appt_entry future[];
X
X
X#ifndef NOTOOL
X/*
X * This one draws the current selected day in the
X * main subwindow.
X */
X
Xdraw_day()
X{
X    draw_day1();
X    draw_future_appts();
X#ifndef NO_SUN_MOON
X    if (sframe)
X        write_sun_data();
X    if (mframe)
X        write_moon_data();
X#endif
X}
X
X/*
X * Draw main day page without future appts or Sun/Moon data
X */
Xdraw_day1()
X{
X    int i;
X
X    lock_cursors();
X    fix_current_day();
X    working(TRUE);
X    pw_batch_on(main_pixwin);
X    draw_day_outline();
X    pw_batch_off(main_pixwin);
X    i = get_day_appts();
X    working(FALSE);
X    if (i) {
X        draw_day_appts();
X    }
X    day_is_open = TRUE;
X    unlock_cursors();
X}
X
X/*
X * Utility for draw_day ... draws the outline of a day.
X */
Xdraw_day_outline()
X{
X    char timestring[6], daystring[31], buf[64], *src;
X    int x, y, starty, i, d;
X    Rect *rect;
X
X    /* First erase the window. */
X    rect = (Rect *) window_get(canvas, WIN_RECT);
X        pw_writebackground(main_pixwin, 0, 0,
X      rect->r_width, rect->r_height, PIX_CLR);
X    old_slot = -1;    /* text cursor no longer displayed */
X
X    /* Calculate coords of top-left corner of big box. */
X    x = (rect->r_width - dayslot_width) / 2;
X    starty = y = (rect->r_height - (n_slots * dayslot_height)) / 2;
X
X    /* Format daystring to say, for example, */
X    if (day_first)
X        /* Tuesday, 13 March 1990 */
X        sprintf(daystring, "%s %d %s %d",
X            daynames[current.tm_wday], current.tm_mday,
X            monthnames[current.tm_mon], 1900 + current.tm_year);
X    else
X        /* Tuesday, March 13, 1990 */
X        sprintf(daystring, "%s %s %d, %d",
X            daynames[current.tm_wday], monthnames[current.tm_mon],
X            current.tm_mday, 1900 + current.tm_year);
X    pw_text(main_pixwin, (rect->r_width - bigfont->pf_defaultsize.x*strlen(daystring))/2, starty/2 + 7,
X      PIX_SRC, bigfont, daystring);
X
X    for (i=0; i<n_slots; i++) {    /* Init and draw each 30 minute slot. */
X                slots[i].slot_pos.top = y;
X        slots[i].slot_pos.left = x;
X        slots[i].slot_pos.bottom = y + dayslot_height + 1;
X        slots[i].slot_pos.right = x + dayslot_width + 1;
X        slots[i].moreb_pos.top = y;
X        slots[i].moreb_pos.left = rect->r_width - 8 - morebutton->pr_size.x;
X        slots[i].moreb_pos.bottom = y + morebutton->pr_size.y;
X        slots[i].moreb_pos.right = rect->r_width - 8;
X        slots[i].larrow_pos.top = slots[i].slot_pos.top+(dayslot_height-leftarrow->pr_size.y)/2;
X        slots[i].larrow_pos.left = slots[i].slot_pos.right + 8;
X        slots[i].larrow_pos.bottom = slots[i].larrow_pos.top + leftarrow->pr_size.y;
X        slots[i].larrow_pos.right = slots[i].larrow_pos.left + leftarrow->pr_size.x;
X        slots[i].rarrow_pos.top = slots[i].larrow_pos.top;
X        slots[i].rarrow_pos.left = slots[i].larrow_pos.right + 8;
X        slots[i].rarrow_pos.bottom = slots[i].larrow_pos.bottom;
X        slots[i].rarrow_pos.right = slots[i].rarrow_pos.left + rightarrow->pr_size.x;
X        if (!ymd_compare(current, today))
X            pw_write(main_pixwin,x,y,dayslot_width,dayslot_height,PIX_SRC,timeslot_td_pr,0,0);
X        else
X            pw_write(main_pixwin,x,y,dayslot_width,dayslot_height,PIX_SRC,timeslot_pr,0,0);
X        if (i < n_tslots) {
X            /* display time */
X            if (hour24)
X                sprintf(timestring, "%2d:%s",
X                    start_hour+(i/2),
X                    i%2 == 0 ? "00" : "30");
X            else
X                sprintf(timestring, "%2d:%s%s",
X                    (start_hour+(i/2))%12 == 0 ? 12 : (start_hour+(i/2))%12,
X                    i%2 == 0 ? "00" : "30", (start_hour+(i/2) < 12 ? "am" : "pm"));
X        } else if (i == n_tslots) {
X            sprintf(timestring, "Notes");
X        } else {
X            sprintf(timestring, "     ");
X        }
X        pw_text(main_pixwin,x-9*font->pf_defaultsize.x,y+font->pf_defaultsize.y,PIX_SRC,font,timestring);
X        y += dayslot_height - 1;
X    }
X
X    pw_vector(main_pixwin,x,starty,x+dayslot_width-1,starty,PIX_SET,1);
X        pw_vector(main_pixwin,x,y,x+dayslot_width-1,y,PIX_SET,1);
X    y += (dayslot_height - 1) * 2;
X    sprintf(buf,
X        "Day of year: %d  --  %d days remaining.      Week number: %d",
X        day_of_year((double)current.tm_mday, current.tm_mon+1, current.tm_year+1900),
X        days_remaining_in_year((double)current.tm_mday, current.tm_mon+1, current.tm_year+1900),
X        week_number());
X    pw_text(main_pixwin, x, y, PIX_SRC, font, buf);
X    sun_moon_buttons(TRUE);
X    print_button(TRUE);
X}
X#endif  /* NOTOOL */
X
X#ifndef NOTOOL
X/* draw in todays appointments */
Xdraw_day_appts()
X{
X    int slotno, narrows, i;
X    int offset, x, y;
X
X    pw_batch_on(main_pixwin);
X    /* first clear all the slots */
X    for (slotno=0; slotno<n_slots; slotno++) {
X        slots[slotno].arrow_pos = 0;
X        x = slots[slotno].slot_pos.left;
X                y = slots[slotno].slot_pos.top;
X        if (!ymd_compare(current, today))
X            pw_write(main_pixwin,x,y,dayslot_width,
X              dayslot_height,PIX_SRC,timeslot_td_pr,0,0);
X        else
X            pw_write(main_pixwin,x+1,y+1,dayslot_width-2,
X              dayslot_height-2,PIX_CLR,NULL,0,0);
X    }
X
X    /* draw in current info */
X    for (slotno=0; slotno<n_slots; slotno++) {
X        if (slots[slotno].active) {
X            rewrite_string(slotno, JUSTIFY_LEFT);
X            if ((narrows = slots[slotno].cur_appt->arrows) > 0) {
X                /* find first free position for arrow */
X                offset = 0;
X                while (slots[slotno].arrow_pos & 1<<offset)
X                    offset++;
X                slots[slotno].arrow_pos |= 1<<offset;
X                i = slotno + narrows;
X                draw_arrowhead(i, offset, FALSE);
X                while (--narrows > 0)
X                    draw_arrowshaft(--i, offset, FALSE);
X            }
X            more_check(slotno);
X        }
X    }
X    pw_batch_off(main_pixwin);
X}
X
X/* Blacks out day-slot and then re-writes string. */
Xrewrite_string(bi, justify)
Xint bi, justify;
X{
X    char slot_str[MAX_STRLEN];
X    char *ptr;
X    int strl, *iptr;
X
X    strl = strlen(slots[bi].cur_appt->str);
X    iptr = &slots[bi].cur_appt->sindex;
X    if (strl < day_message_size) {
X        *iptr = 0; /* just in case */
X        strcpy(slot_str, slots[bi].cur_appt->str);
X        /* erase any previously existing scroll arrows */
X        pw_writebackground(main_pixwin, slots[bi].larrow_pos.left,
X            slots[bi].larrow_pos.top, slots[bi].rarrow_pos.right-slots[bi].larrow_pos.left,
X            slots[bi].larrow_pos.bottom-slots[bi].larrow_pos.top,
X            PIX_CLR);
X    } else {
X        if (justify == JUSTIFY_RIGHT) {
X            /* show trailing part */
X            ptr = &slots[bi].cur_appt->str[strl - day_message_size + 1];
X            *iptr = strl - day_message_size + 1;
X            strcpy(slot_str, ptr);
X        } else {
X            /* show leading or indexed part */
X            if (justify == JUSTIFY_LEFT)
X                *iptr = 0;
X            if (*iptr > (strl - day_message_size + 1))
X                *iptr = strl - day_message_size + 1;
X            if (strlen(&slots[bi].cur_appt->str[*iptr]) >= day_message_size-1) {
X                strncpy(slot_str, &slots[bi].cur_appt->str[*iptr], day_message_size-1);
X                slot_str[day_message_size-1] = '\0';
X            } else
X                strcpy(slot_str, &slots[bi].cur_appt->str[*iptr]);
X        }
X        /* display scroll arrows */
X        pw_write(main_pixwin, slots[bi].larrow_pos.left,
X            slots[bi].larrow_pos.top, leftarrow->pr_size.x,
X            leftarrow->pr_size.y, PIX_SRC, leftarrow, 0, 0);
X        pw_write(main_pixwin, slots[bi].rarrow_pos.left,
X            slots[bi].rarrow_pos.top, rightarrow->pr_size.x,
X            rightarrow->pr_size.y, PIX_SRC, rightarrow, 0, 0);
X    }
X        pw_write(main_pixwin, slots[bi].slot_pos.left+1, slots[bi].slot_pos.top+1,
X                dayslot_width-2, dayslot_height-2, PIX_SET, NULL, 0, 0);
X        pw_text(main_pixwin, slots[bi].slot_pos.left+5, slots[bi].slot_pos.top+font->pf_defaultsize.y,
X                PIX_NOT(PIX_SRC), font, slot_str);
X}
X
X/* display "more" button if necessary */
Xmore_check(slotno)
Xint slotno;
X{
X    int x, y, w, i, offset;
X    int narrows;
X    struct appt_entry *aptr;
X
X    x = morebutton->pr_size.x;
X    y = morebutton->pr_size.y;
X
X    /* clear any previous button that may be there */
X    pw_write(main_pixwin, slots[slotno].moreb_pos.left, slots[slotno].moreb_pos.top,
X        x, y, PIX_CLR, NULL, 0, 0);
X    /* button displayed when more than 1 reference
X     * and at least one real appt for this slot.
X     */
X    if (slots[slotno].active > 1) {
X        for (aptr=slots[slotno].first; aptr; aptr=aptr->next) {
X            if (aptr == slots[slotno].cur_appt)
X                continue;  /* already did this one */
X            if (chk_deleted(&slots[slotno], aptr))
X                continue;  /* ignore deleted appts */
X            if ((narrows = aptr->arrows) > 0) {
X                /* find first free position for arrow */
X                offset = 0;
X                while (slots[slotno].arrow_pos & 1<<offset)
X                    offset++;
X                slots[slotno].arrow_pos |= 1<<offset;
X                i = slotno + narrows;
X                draw_arrowhead(i, offset, TRUE);
X                while (--narrows > 0)
X                    draw_arrowshaft(--i, offset, TRUE);
X            }
X        }
X        /* display more button to right of slot */
X        pw_write(main_pixwin, slots[slotno].moreb_pos.left, slots[slotno].moreb_pos.top,
X            x, y, PIX_SRC, morebutton, 0, 0);
X    }
X}
X
Xdraw_arrowshaft(i, offset, gray)
Xint i;
Xint offset;
Xint gray;
X{
X    /* mark this position as used */
X    slots[i].arrow_pos |= 1<<offset;
X    /* translate to screen coordinates */
X    offset = (offset + 1) * 40;
X    pw_rop(main_pixwin, slots[i].slot_pos.left+1+offset, slots[i].slot_pos.top,
X      16, dayslot_height, PIX_SRC|PIX_DST,
X      (gray ? gr_arrowshaft_pr : arrowshaft_pr), 0, 0);
X}
X
X
X
Xdraw_arrowhead(i, offset, gray)
Xint i;
Xint offset;
Xint gray;
X{
X    /* mark this position as used */
X    slots[i].arrow_pos |= 1<<offset;
X    /* translate to screen coordinates */
X    offset = (offset + 1) * 40;
X        pw_rop(main_pixwin, slots[i].slot_pos.left+1+offset, slots[i].slot_pos.top,
X          16, dayslot_height, PIX_SRC|PIX_DST,
X      (gray ? gr_arrowhead_pr : arrowhead_pr), 0, 0);
X}
X
X/*
X * Routine to create popup window with future appts shown in it
X */
Xdraw_future_appts()
X{
X    if (show_future && findex && (ymd_compare(current, today) == 0)) {
X        create_future_popup();
X    } else {
X        /* nothing to show */
X        /* destroy future appts popup, if it exists */
X        if (fframe) {
X            window_destroy(fframe);
X            fframe = 0;
X        }
X    }
X}
X#endif  /* NOTOOL */
X
X#ifndef NO_SUN_MOON
X/*
X * write sun data to the popup canvas
X */
Xwrite_sun_data()
X{
X    int    x, y, height;
X    char    buf[64];
X    Pixwin    *spixwin;
X    Rect    *rect;
X    struct    timeval tp;
X    double    jdays, secs, offset;
X    double    julian_day();
X    char    *sunlight;
X
X    /* first erase the window. */
X    spixwin = (Pixwin *)canvas_pixwin(scanvas);
X    rect = (Rect *) window_get(scanvas, WIN_RECT);
X        pw_writebackground(spixwin, 0, 0,
X      rect->r_width, rect->r_height, PIX_CLR);
X
X    x = font->pf_defaultsize.x;
X    height = y = font->pf_defaultsize.y;
X
X    gettimeofday(&tp, 0);
X    if (ymd_compare(current, today) == 0) {
X        /* use current time */
X        write_times();
X        panel_set(sdate_pi, PANEL_LABEL_STRING, riseset_buf[B_DMY], 0);
X        y += 11 * height;
X    } else {
X        /* convert today's date to approx. seconds from 1-1-1970 */
X        jdays = julian_day((double)today.tm_mday, today.tm_mon+1, today.tm_year+1900) - J1970;
X        /* seconds from 00:00 GMT to now */
X        offset = tp.tv_sec - (jdays * 24. * 3600.);
X        /* convert this date to approx. seconds from 1-1-1970 */
X        jdays = julian_day((double)current.tm_mday, current.tm_mon+1, current.tm_year+1900) - J1970;
X        /* seconds to the same time on selected day */
X        secs = (jdays * 24.0 * 3600.) + offset;
X        riseset((long)secs);
X        panel_set(sdate_pi, PANEL_LABEL_STRING, riseset_buf[B_DMY], 0);
X        pw_text(spixwin, x, y, PIX_SRC, font, riseset_buf[B_JLD]);
X        y += height;
X    }
X    sprintf(buf, "Sun Rise    (today): %s   Total Hours of", riseset_buf[B_SRD]);
X    pw_text(spixwin, x, y, PIX_SRC, font, buf);
X    y += height;
X
X    sprintf(buf, "Sun Set     (today): %s   Sunlight %5s ", riseset_buf[B_SSD],
X        riseset_buf[B_LOD]);
X    pw_text(spixwin, x, y, PIX_SRC, font, buf);
X    y += height;
X    sprintf(buf, "Sun Rise (tomorrow): %s", riseset_buf[B_SRT]);
X    pw_text(spixwin, x, y, PIX_SRC, font, buf);
X    y += height;
X    sprintf(buf, "Sun Set  (tomorrow): %s", riseset_buf[B_SST]);
X    pw_text(spixwin, x, y, PIX_SRC, font, buf);
X}
X
X/*
X * write sun time data to the popup canvas
X */
Xwrite_times()
X{
X    int    x, y, height;
X    Pixwin    *spixwin;
X    struct    timeval tp;
X
X    /* only update these if displaying today's page */
X    if (ymd_compare(current, today) != 0)
X        return;
X
X    spixwin = (Pixwin *)canvas_pixwin(scanvas);
X
X    x = font->pf_defaultsize.x;
X    y = height = font->pf_defaultsize.y;
X
X    gettimeofday(&tp, 0);
X    riseset(tp.tv_sec);
X    pw_text(spixwin, x, y, PIX_SRC, font, riseset_buf[B_GMT]);
X    y += height;
X    pw_text(spixwin, x, y, PIX_SRC, font, riseset_buf[B_TDT]);
X    y += height;
X    pw_text(spixwin, x, y, PIX_SRC, font, riseset_buf[B_LCT]);
X    y += height;
X    pw_text(spixwin, x, y, PIX_SRC, font, riseset_buf[B_LMT]);
X    y += height;
X    pw_text(spixwin, x, y, PIX_SRC, font, riseset_buf[B_GST]);
X    y += height;
X    pw_text(spixwin, x, y, PIX_SRC, font, riseset_buf[B_LST]);
X    y += height;
X    pw_text(spixwin, x, y, PIX_SRC, font, riseset_buf[B_JLD]);
X    y += height;
X    pw_text(spixwin, x, y, PIX_SRC, font, riseset_buf[B_LHA]);
X    y += height;
X    pw_text(spixwin, x, y, PIX_SRC, font, riseset_buf[B_SDE]);
X    y += height;
X    pw_text(spixwin, x, y, PIX_SRC, font, riseset_buf[B_SAZ]);
X    y += height;
X    pw_text(spixwin, x, y, PIX_SRC, font, riseset_buf[B_SEL]);
X}
X
X/*
X * write moon data to the popup canvas
X */
Xwrite_moon_data()
X{
X    int    x, y, height;
X    char    buf[64];
X    Pixwin    *mpixwin;
X    Rect    *rect;
X    struct    timeval tp;
X    double    jdays, secs, offset;
X    double    julian_day();
X
X    /* first erase the window. */
X    mpixwin = (Pixwin *)canvas_pixwin(mcanvas);
X    rect = (Rect *) window_get(mcanvas, WIN_RECT);
X        pw_writebackground(mpixwin, 0, 0,
X      rect->r_width, rect->r_height, PIX_CLR);
X
X    x = font->pf_defaultsize.x;
X    y = height = font->pf_defaultsize.y;
X
X    gettimeofday(&tp, 0);
X    if (ymd_compare(current, today) == 0) {
X        /* use current time */
X        riseset(tp.tv_sec);
X        moon_data(tp.tv_sec);
X    } else {
X        /* convert today's date to approx. seconds from 1-1-1970 */
X        jdays = julian_day((double)today.tm_mday, today.tm_mon+1, today.tm_year+1900) - J1970;
X        /* seconds from 00:00 GMT to now */
X        offset = tp.tv_sec - (jdays * 24. * 3600.);
X        /* convert this date to seconds from 1-1-1970 */
X        jdays = julian_day((double)current.tm_mday, current.tm_mon+1, current.tm_year+1900) - J1970;
X        /* seconds to the same time on selected day */
X        secs = (jdays * 24.0 * 3600.) + offset;
X        riseset((long)secs);
X        moon_data((long)secs);
X    }
X    panel_set(mdate_pi, PANEL_LABEL_STRING, riseset_buf[B_DMY], 0);
X    y = 6 * height;
X    sprintf(buf, "Moon Rise    (today): %s", riseset_buf[B_MRD]);
X    pw_text(mpixwin, x, y, PIX_SRC, font, buf);
X    y += height;
X    sprintf(buf, "Moon Set     (today): %s", riseset_buf[B_MSD]);
X    pw_text(mpixwin, x, y, PIX_SRC, font, buf);
X    y += height;
X    sprintf(buf, "Moon Rise (tomorrow): %s", riseset_buf[B_MRT]);
X    pw_text(mpixwin, x, y, PIX_SRC, font, buf);
X    y += height;
X    sprintf(buf, "Moon Set  (tomorrow): %s", riseset_buf[B_MST]);
X    pw_text(mpixwin, x, y, PIX_SRC, font, buf);
X}
X
X#endif    /* NO_SUN_MOON */
END_OF_FILE
if test 16033 -ne `wc -c <'dpaint.c'`; then
    echo shar: \"'dpaint.c'\" unpacked with wrong size!
fi
# end of 'dpaint.c'
fi
echo shar: End of archive 8 \(of 23\).
cp /dev/null ark8isdone
MISSING=""
for I in 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 ; do
    if test ! -f ark${I}isdone ; then
    MISSING="${MISSING} ${I}"
    fi
done
if test "${MISSING}" = "" ; then
    echo You have unpacked all 23 archives.
    rm -f ark[1-9]isdone ark[1-9][0-9]isdone
else
    echo You still need to unpack the following archives:
    echo "        " ${MISSING}
fi
##  End of shell archive.
exit 0

exit 0 # Just in case...
--
Kent Landfield                   INTERNET: [e-mail]
Sterling Software, IMD           UUCP:     uunet!sparky!kent
Phone:    [phone]         FAX:      [phone]
Please send comp.sources.misc-related mail to [e-mail].